package Movie;

use Moose;
use Readonly;

# has 'CHILDRENS' => (
#   is => 'ro',
#   isa => int,
#   default => 2,
# );

# has 'REGULAR' => (
#   is => 'ro',
#   isa => int,
#   default => 0,
# );

# has 'NEW_RELEASE' => (
#   is => 'ro',
#   isa => int,
#   default => 1,
# );

Readonly::Scalar our $CHILDREN => 2;
Readonly::Scalar our $REGULAR => 0;
Readonly::Scalar our $NEW_RELEASE => 1;

has '_title' => (
    isa => 'Str',
    is => 'ro',
    reader => 'get_title',
    required => 1,
);

has '_price_code' => (
    isa => 'Int',
    reader => 'get_price_code',
    writer => 'set_price_code',
    required => 1,
);



1;